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to 

* 3 

^include <olectl.h> 

// hsDHTKLContro 1 „ idl : IDL source for hsDHTMLControl.dll 
// 

// This file will be processed by the MIDL tool to 
// produce the type library (hsDHTKLControl . tlb) and marshalling code. 

import "oaidl . idl n ; 
import "ocidl.idl"; 

# include <mshtmdid.h> 
[ 

object, 

Uuid(17F34ED4-FB5 9-llDl-801A-00201829472A) , 
dual, 

helpstring(-IHSDHTMLControl Interface") , 
point er_de fault (unique) 

3 

interface IHSDHTMLControl : IDispatch 

{ 

// Error codes come form this enumerations . 

// The severity is S EVER I TY_ERROR and the facility is FACILITY_ITF 
typedef enum HSFTDHTMLControl Error { 

E_IHSDC_ERR_NULL_DOCUMENT_OBJECT = 0x201, 

E_IHSDC_ERR__NO_RDS_CONTROL = 0x202, 

E_IHSDC_ERRJ3BJECT_IS_NO_PROPER_INTERFACE = 0x203, 
E_IHSDC_ERR_NO_PARSED_PAGE = 0x204, 
E_IHSDC_ERR_UNKNOWN_HSTYPE = 0x20 5, 
E_IHSDC_ERR_UNKNOWN_DHTMLCONTROL = 0x206, 
E_IHSDC_ERR_N0_SUCHJ3BJECT = 0x207, 
E_IHSDC_ERR_RECORDSET_EXPECTED = 0x208, 
E_IHSDC_ERR_NOT_SUPPORTED_ELEMENT = 0x209 
} HSFTDHTMLControlError; 




// **** HTML page convetnions 

// HTML pages loaded to this control are expected to follow the conventions: 
// 

// They should contain the following object 

// <object id= ■ hsDHTMLCt 1 " classid="clsid: 17F34ED5-FB59-11D1-801A-00201829472A" 
// align- "baseline" border="0" width="0" height="0 rt > 



// This method should be called every time the layout of a page changes (e.g. naviga 

te to 

// a different document, add remove controls etc.) 

[id(12), helpstring ("method ParseHTMLPage ■ ) ] HRESULT ParseHTMLPage () ; 

//A helper function that creates a recordset based on the elements in the form. 

// Only elements containing the attribute DATASRC (or HSDATASRC) are treated by the 

control. 

// Attributes with HSTYPE are put in the recordset (field DATAFLD or HSDATAFLD) . 
// Attributes with HS FORMAT are validated. 

// The type of the field is based on the value of the attribute. 

// The name of the field is based on the "datafld" attribute (or HSDATAFLD) . 

// hSTYPE is used for the recordset, HS FORMAT is used for validation 

// Here are supported : 



1 



// 






// 


KSTYPE 




// 






// 

9 9 


string 


implemented 


J / 


boolean 


— inmlemeiited 


// 


intecrer 


-— implemented 


/ / 


date 


- - implemented 


// 


smalllnt 


implemented 


/ / 


currency 


implemented 


// 


double 


-- implemented 


// 






// 


HS FORMAT 




// 








// boolean 




// 






// 


Valid forms; 



// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 



External form; 
Internal form; 



cobcode 



Valid forms ; 

External form ,- 
Internal form; 



cpt4code 



Valid forms; 



External 
Internal 



form; 
form; 



date 



Valid forms; 
External form; 



"1" 


or 


■0" 




or 


"0" 




or 





X Where 'X* denotes a letter or a digit. 
There must be only 1 character. 
X Where 'X 1 denotes a letter or a digit. 
X Where 'X' denotes a letter or a digit. 



99999 Where ' 9 1 denotes a digit. 
There must be 5 digits . 
99999 Where *3 % denotes a digit. 
99999 Where , 9' denotes a digit. 



tings 
only 



n 



When the regional setting does 
for purposes of the date control 
// Internal form; 

// 

// datetime 

// 
// 
// 



Any of the date forms shown in the "Regional 
settings of the control panel. 

The date format currently set for the local machine. 
This is set in the control panel under "Regional Set 
not show four digit years, the setting is modified - 
■ to use four digit years . 

mm/dd/yyyy This is the standard Informix date format 



Valid forms; 



// 

// 
// 

// 
// 
// 
// 
// 
// 
// 



Any of the date and time forms shown in the 
"Regional settings of the control panel. 
External form; The date and time formats currently set for the loca 

machine. This is set in the control panel under 
"Regional Settings". When the regional setting doe 

not show four digit years, the setting 
is modified - only for purposes of the date control 
- to use four digit years . 
Internal form; mm/dd/yyyy hh:mm:ss This is standard Informix 

date time format. 



hcpcscode 
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V 



e. 



ecimal 
d by 
nt 



ecimal 



handled ; 



// 
// 
// 
// 
// 

// 
// 
// 
// 
// 

// 
// 

// 

// 

// 

// 

// 
// 

// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 

// 

// 

// 
// 
// 
// 
// 
// 
// 
// 
// 
// 

// 

// 
// 
// 



Valid forms; 



External form; 



A9999 Where A is a character A thru V (inclusive) . 
The characters may be upper or lower case. There 
must be 5 characters. 

A9999. The first character is converted to uppercas 



Internal form; A9999 



icdcode 



Valid forms; a.b Where 'a 1 denotes 1-3 digits or a letter followe 

by 2 digits, and b denotes 1-2 digits. The decimal 
point is optional if there are no digits after the d 

External form; a.b Where 'a 1 denotes 1-3 digits or a letter followe 

2 digits, and b denotes 1-2 digits. The decimal poi 
is optional if there are no digits after the decimal 

Internal form; a.b Where 'a 1 denotes 1-3 digits or a letter followe 

by 2 digits, and b denotes 1-2 digits. The decimal 
point is optional if there are no digits after the d 



integer 



Valid forms; 



External form; 



Internal form; 



integer values. Negative signs allowed as either 

or the value in parenthesis, 
integer value with negative indicated as per the 
regional settings. 

integer value with to indicate negatives. 



Name 



Valid forms ; 
External form; 



Any text. 

The validator removes all leading and trailing space 
and then replaces runs of multiple whitespace with a 
single blank character. The following patterns are 



Pattern 

Tokenl, token2 , token3 

Tokenl , Token2 

Token 

Tokenl Token2 
Tokenl Token2 Token3 



Translated to 

Tokenl, token2, token3 

Tokenl , Token2 

Token 

Token2 , Tokenl 
Token3 , Tokenl , Token2 



Words that are of a single case (all lowercase character 

or all uppercase characters) are translated to prope 

form where the first character is uppercase and the 
others are lowercase. 
Internal form; Same as external form. 
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rs 



clusie) 



tings 



xne 



tings 



999 



or 



// 

// searchable 
// 

// Valid forms; 



// 
// 
// 
// 
// 
// 
// 
// 

// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 

// 

// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 

// 

// 
// 
// 
// 
// 

// 

// 
// 
// 
// 
// 



External form; 
Internal form; 



Any string that does not contain one of the characte 

•?*(]%". This is used for fields that would be used 
for a search. 
The string. 
The string. 



small int 



Valid forms; integer values in the range SHRT__MIN to SHRT_MAX (in 



External form; 



Internal form; 



Negative signs allowed as either 
■-" or the value in parenthesis. 

integer value with negative indicated as per the 
regional settings . 

integer value with " - " to indicate negatives. 



time 



Valid forms; 



External form; 



Any of the time forms shown in the "Regional 
settings of the control panel. 

The time format currently set for the local machine. 
This is set in the control panel under "Regional Set 
Internal form; hh : mm : ss This is standard Informix time format. 



usein 



Valid forms; 

External form; 
Internal form; 



999-99-9999 Where '9' denotes a digit 
Dashes are optional. 

99 9-99-9999 Where '9' denotes a digit 

999999999 Where '9' denotes a digit. 



Note this is identical to SSN. 



usmoney 



Valid forms; 



External form; 



Any of the currency forms shown in the "Regional 
settings of the control panel . 

The currency format currently set for the local mach 
This is set in the control panel under "Regional Set 



Internal form; A floating point number. 



usphone 



Valid forms; 



External form; 
Internal form; 



(999)999-9999 Where '9' denotes a digit, or 999.99.9 

Everything but the digits are optional. The validat 

is also very flexible about accepting intervening 
whitespaces . 

(999) 999-9999 Where '9' denotes a digit. 
9999999999 Where '9* denotes a digit. 
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ptional . 



se 



et to 



ngle 



e moved . 



// 
// 
// 

// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 
// 

// 



usssn 



Valid forms; 999-99-9999 Where '9 1 denotes a digit. Dashes are o 

External form; 999-99-9999 Where , 9 I denotes a digit. 
Internal form: 99 9999999 Where •9' denotes a digit - 

Note that this is identical to EIN. 



usState 



Valid forms; 



Any one of the following; 



"AX", "AL", "AR", "AZ", "CA", "CO", "CT", "DC", "DE", "FL", "GA" , "HI", 
"IA", "ID", "LL" , "IN" , "ICS" , "KY" , "LA", "MA", "MD" , "ME" , "MI", "MN" , 

"MO", "MS", -Mr- -nc" «nd" "ne- -nh" "nj" 



■OK" 



'VT' 



OR", 
WA", 



'MT", 
'PA", 
'WI", "WV", "WY 



PR", "RI«, "SC", "SD' 



, ,M , , "NV-, "NY" , "OH", 



"TN" 



'NM 
'TX 



« « 



DT", "VA", "VI", 



External form; The validator removes all leading and trailing space 



Internal form: 



// 
// 
II 

// usStreet 

// 

// Valid forms ; 

// External form; 

// 
// 
// 



// 
// 

// 
// 
// 
// 
// 
// 

// 
// 



compares against the valid forms, and changes the ca 

to upper case. 

Same as external form. 



Internal form; 



Any text . 

The validator removes all leading and trailing space 
and then replaces runs of multiple whitespace with a 

4 

single blank character. The first letters of words, 

which are runs of letters seperated by blanks, are s 

uppercase and all the following letters are set to 
lowercase if all of the letters in the word are a si 

case (all upper or all lower) . 
Same as external. 



yes no 



Valid forms; 



Y", "y" "Yes", "YEs", "YES", "YeS", "N" , "n", "No", 



II 
II 

II usZipcode 
II 
II 
II 
II 



"NO", "nO", "no". 

External form; "Yes" or "No". Leading and trailing whitespace is r 
Internal form: Same as external. 



Valid forms ; 
External form; 
Internal form; 



"99999" or "99999-9999" where 1 9' denotes a digit - 
"99999". The zip+4 is removed. 
"9 9999" where 9 denotes a digit. 
// 

// implemented 

(id(4), helpstring( "method CreateListOf HTMLElements " ) 1 HRESULT CreateHTMLElements ( [ i 
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* 



♦ 

n] BSTR dataSource, [out, retvax] LPDISPATCH* ADORRecordset); 

// Gee and set the recordset that maps to the HTML Elements. The returned recordsets 
are typed. 

// STATUS: implemented 

(propget, id(ll), helpstring ( "property HTMLElements ■ ) ] HRESULT HTMLElements ( [in] BSTR 
dataSource, [out, retval] LPDISPATCH *pVal) ; 

[propputref, id(ll) , he lpst ring ( "property HTMLElements " ) ] HRESULT HTMLElements ( [in] B 
STR dataSource, (in] LPDISPATCH newVal) ; 

// The untyped counterparts of the above functions 

// The returned recordsets are untyped (HSTYPE ignored and we return strings) » 
[id(24), helpstring ( "method CreateListOfUntypedHTMLElements" ) ] HRESULT CreateUntyped 
HTMLElements ( [in] BSTR dataSource, (out, retval) LPDISPATCH* ADORRecordset) ; 

(id(25) , helpstring ( "the reverse of the parse method, cleans up resources")] HRESULT 
Cleanup ( ) ,- 

// Get and set the recordset that maps to the HTML Elements. 
// STATUS: implemented 

[propget, id(21) , helpstring ( "property UntypedHTMLElements" ) ] HRESULT UntypedHTMLEle 
ments ( (in] BSTR dataSource, (out, retval] LPDISPATCH *pVal) ; 

(propputref, id(2l), helpstring ( "property UntypedHTMLElements" ) ] HRESULT Untype dHTML 
Elements ( [in] BSTR dataSource, [in] LPDISPATCH newVal) ; 

// This property can be set using: 

// <PARAM NAME = "ValidateOnKeyUp" VALUE="0"> 

[propget, id(13) , helpstring ( "property ValidateOnKeyUp" ) ] HRESULT ValidateOnKeyUp ( [o 
ut, retval] BOOL *pVal) ; 

[propput, id(13) , helpstring ( "property ValidateOnKeyUp" ) ] HRESULT ValidateOnKeyUp ([ i 
n] BOOL newVal) ; 

// This property can be set using: 

// <PARAM NAME="InvalidClassName" VALUE= " INVALID ■ > 

[propget, id(14) , helpstring ( "property InvlalidClass" ) ] HRESULT InvalidClassName ( (ou 
t, retval] BSTR *pVal) ; 

[propput, id<14), helpstring ( "property InvlalidClass")] HRESULT InvalidClassName ( [in 
] BSTR newVal) ; 

// After setting the recordset all the elements are valid. As the user changes value 

s the 

// controls raises the event and asks if this is a valid change. If any listener ind 

icates 

// that this is not a valid change it is marked as not valid and the recordset is no 
t updated. 

[propget, id(3), helpstring ( "property AreAllElementsValid" ) ] HRESULT AreAllHTMLEleme 
ntsValid( [in] BSTR dataSource, [out, retval] BOOL *pVal) ; 

// An alternative of the AreAllHTMLElementsValid ( ) methods that also returns a safea 
rray with the 

// ids od the invalid elements. If the array has 0 elements all the elements are val 

id 

(id(30), helpstring ("method InvalidElements" ) ] HRESULT InvalidElements ( [ in] BSTR data 
Source, (out ] SAFEARRAY (BSTR) * dataSourceElems) ; 

// When the SetHTMLElement method is called we clear or not the elements based 

// on the value of this property 

// 

// In 2.0 default is OFF 

// This will change in future releases 

// This property can be set using: 
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// <PARAM NAME* "Reset ElementContent30nSet* VALUE" " 1 " > 

(propget, id(31) , he lpst ring { "property ResetElementContentsOnSet " ) ] HRESULT ResetEle 
mentContentsOnSet ( [out., retval) BOOL *pval) ; 

(proppuc, id(31), helpstring ( "property ResetElementContentsOnSet")] HRESULT ResetEle 
mentContentsOnSet ( [ in] BOOL newVal) ; 



// This is used to set elements like listboxes and comboboxes that cannot be set dir 

ectly 

// from data binding. It is set before setting the HTMLElements property 
[id(5) , helpstring ("method SetHTMLElement " ) 3 HRESULT SetHTMLElement ( [in] BSTR idOfEle 
ment, [inl SAFEARRAY (VARIANT) * values) ; 

// Same as above but uses a column in a recordset to get values 

(id(6), helpstring ("method SetHTMLElement") I HRESULT SetHTMLElement FromRecordset ( [in 
] BSTR idOf Element, [in] LPDIS PATCH adorRecordset , [in] BSTR f ieldName) ,- 

// Reset controls by clearing all text. Doesn't delete controls, just resets content 

s 

(id(32), helpstring ("Clear All HTML Element Display Text")] HRESULT ClearAllHTMLElem 
entDisplayText ( ) ; 

// Provide folks a way of determining/getting "dirty" html elements (BUGno24507) 
(propget, id(33), helpstring ( "property (readonly) DirtyElementsExist flag")] 

HRESULT DirtyElementsExist (tin] BSTR dataSource, [out, retval] VAR I ANT_BOOL *pVal 



); 



)] 
s) ; 



(id(34) , helpstring ( "Clear any elements that are marked dirty.")] 

HRESULT ClearDirtyFlags ( [in] BSTR dataSource) ; 
(id{35), helpstring ( "Get the list of modified elements. Returns element identifiers" 

HRESULT GetDirtyElement IDs ( [in] BSTR dataSource, [out] SAFEARRAY (BSTR) * elementID 



// XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX 
// Deprectaed methods please do not use 
// XXXXXXXXXXXXXXXXXXXX^ 

// Get the containing browser. From it you get go to document, window, catch events 
etc . - 
// This method should not be necessary any more 
// implemented 

[propget, id{l), helpstring ( "property Browser")] HRESULT Browser ( [out , retval] LPDIS 
PATCH* pVal) ; 



// This is a tricky method. The major porblem is to time when to call it. If you set 
the recordset and 

// immediately call it, it wont work, because the population of the widgets from the 
recordset 

// happens asynchronously and is not clear to me when we are done 

[id(7), helpstring ("do the validation" )] HRESULT Validate ( [in] BSTR dataSource); 



hidden, 
dual , 
object , 

uuid(3 050f 3 3c-98b5-llcf -bb82 -OOaaOObdceOb) 
1 

interface HTMLElementEvents : IDispatch 
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[id(DISPID_HTMLELEMENTEVENTS_ONHELP) 1 HRESULT onhelp( [out, retval] VARIANT_BOOL*) ; 
[id(DISPID_HTMLELEMENTEVENTS_ONCLICK) ] HRESULT onclick ( [out , retval] VAR IANT_BOOL*) 



BOOL* ) ; 
BOOL*) ; 



[id(DISPID_HT^EI^>TENTEVKNTS_ONDBLCLICK)] HRESULT ondblclick( [out, retval] VARIANT 
[id(DISPID_HTMLELEMENTEVENTS ONKEYPRESS) ] HRESULT onkeypress ( [out , retval] VARIANT 



[id (DISPID_HTOLELEMENTEVENTS_ONKEYDOWN) J HRESULT onkeydown ( ) ; 
[ i d ( D I S P I D__HTMLELEMENTEVENTS_ONKEYUP ) ] HRESULT onkeyup ( ) ; 
[id(DISPI D_HTMLELEMENTEVENTS_ONMOUS EOUT ) ] HRESULT onmouseout ( ) ; 
[ id ( D I S P I D_HTMLELEMENTEVENTS_ONMOUS EOVER } ] HRESULT onmouseover ( ) ; 
[ id ( D I S P ID_HTMLELEMENTEVKNTS_ONMOUS EMOVE ) ] HRESULT onmousemove ( ) ; 
[id (DISPID^HTMLELEMENTEVENTS^ONMOUSEDOWN) ] HRESULT onmousedown ( ) ; 
[ id ( D I S P ID_HTMLELEMENTEVENTS__ONMOUSEUP ) 3 HRESULT onmouseup ( ) ; 

[ id { D I S P I D_HTMLELEMENTEVENTS_ONSELECTSTART ) ] HRESULT onselectstart ( [out, retval] VAR 
IANT_BOOL*) ; 

[id ( D I S P I D_HTMLE LEMENTEVENTS__ONF I LTER CHANGE ) ] HRESULT onf ilterchange ( ) ; 
[id{DISPID_HTMLELEMENTEVENTS_ONDRAGSTART) ] HRESULT ondrags tart ( [out , retval] VARIANT 

_BOOL*) ; 

[id (DISPID_HTMLELEMENTEVENTS_ONBEFOREUPDATE) ] HRESULT onbef oreupdate ( [out, retval] V 
ARIANTJBOOL*) ; 

[id ( D I S P ID_HTMLELEMENTEVENTS_ONAFTERUPDATE ) ] HRESULT onaf terupdate ( ) ; 

[id (DISPID_HTMLELEMENTEVENTS_ONERRORUPDATE) ] HRESULT onerrorupdate ( [out, retval] VAR 
IANT__BOOL*} ; 

[id (DISPID_HTMLELEMENTEVENTS_ONROWEXIT) ] HRESULT onrowexit ( [out, retval] VAR IANT_BOO 

L*); 



[id ( D I S P I D_HTMLE L EMENTEVENTS_ONRO WENTER ) } HRESULT onrowenter ( ) ; 
[id(DISPI D_HTML E L EMENT EVENTS _OND AT AS ETCHANG E D ) ] HRESULT ondat a set changed { ) ; 
[id (DISPID_HTMLELEMENTEVENTS_ONDATAAVAILABLE) ] HRESULT ondataavailable ( ) ; 
[id(DISPID HTMLELEMENTEVENTS ONDATASETCOMPLETE) ] HRESULT ondatase t complete () ; 



C 

hidden , 

dual, 

object, 

Uuid(3 050f2a7-98b5-llcf-bb82-00aa00bdce0b) 
] 

interface HTMLInputTextElementEvents : IDispatch 
{ 

[id(DISPID_HTMLELEMENTEVENTS_ONHELP) ] HRESULT onhelp([out, retval] VARIANT_J300L* ) ; 
[id(DISPID_HTMLELEMENTEVENTS__ONCLICK) ] HRESULT onclick( [out, retval] VAR I ANT_BOOL* } 



BOOL* ) ; 
BOOL*) ; 



[id(DISPID_HTMLELEMENTEVENTS__ONDBLCLICK) ] HRESULT ondblclick( [out, retval] VARIANT^ 
(id(DISPID_HTMLELEMENTEVENTS_ONKEYPRESS) ] HRESULT onkeypress { [out, retval] VARIANT_ 



[id (DISPID_HTMLELEMENTEVENTS_ONKEYDOWN) ] HRESULT onkeydown () ; 
[id(DISPID_HTMLELEMENTEVENTS_ONKEYUP) ] HRESULT onkeyupO; 
[id(DISPID_HTMLELEMENTEVENTS_ONMOUSEOUT) ] HRESULT onmouseout ( ) ; 
[id(DISPID_HTMLELEMENTEVENTS_ONMOUSEOVER) 1 HRESULT onmouseover ( ) ; 
[id(DISPID_HTMLELEMENTEVENTS_ONMOUSEMOVE) ] HRESULT onmousemove ( ) ; 
[ id (D ISP ID_HTML ELEMENT EVENT S_ONM0USE DOWN) ] HRESULT onmousedown ( ) ; 
[id(DISPID_HTMLELEMENTEVENTS_ONMOUSEUP) 3 HRESULT onmouseup ( ) ; 

[id(DISPID_HTMLELEMENTEVENTS_ONSELECTSTART) 3 HRESULT onselectstart ( [out, retvallVAR 
IANT_BOOL*) ; 

[id (D IS PID_HTMLELEMENTEVENTS_ONF ILTERCHANGE) 3 HRESULT onf ilterchange ( ) ; 

[id (DISPID_HTMLELEMENTEVENTS_ONDRAGSTART) 3 HRESULT ondragstart ( [out, retval 3 VARIANT 

BOOL* ) ; 
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* 

* 

( id ( D I S P ID_HTMLELEMENTE \fENTS_ONBEFOREUPDATE ) ] HRESULT onbef oreupdate ( [out, retval] V 
AR IANT_BOOL * ) ; 

[id (DISPID_HTMLELEMENTEVENTS_ONAFTERUPDATE) ] HRESULT onaf terupdate ( ) ; 

[id (DISPID_HTMLELEMENTEVENTS_ONERROROPDATE) ] HRESULT onerrorupdate ( (out, retval] VAR 
IANTJBOOL*) ; 

[id ( D I S P I D_HTMLELEMENTEVENTS_jONROWEX IT) ] HRESULT onrowexit < (out, retval] VARIANT_BOO 

L*) ; 

[id (DISPID_HTMLELEMEITTKVTINTS — ONROWENTER) ] HRESULT onrowenterO ; 

[id (DISPID_H™LELEMENTEVENTS_ONDATASETCHANGED} J HRESULT ondataset changed ( ) ; 

(id (DISPI D_HTMLELEMENTEVENTS_OND ATAAVA I LAB LE ) ] HRESULT ondataavailable ( ) ; 

[id (DISPID_HTMLELEMENTEVENTS_ONDATASETCOMPLETE) ] HRESULT ondatasetcomplete ( ) ; 

[id(DISPID_HTMLCO^rrROLELEMENTEVENTS_ONFOCUS) ] HRESULT onfocus () ; 

(id (DISPID^HTMLCONTROLELEMENTEVENTS^ONBLUR) ] HRESULT onblurO ; 

(id(DISPID_HTMLCONTROLELEMENTEVENTS_ONRESIZE)] HRESULT onresize(); 

[ id ( D IS P ID_HTMLINPUTTEXTELEMENTEVENTS_ONCHANGE) ] HRESULT onchange ( [out , retval] VARIA 
NT_BOOL* ) ; 

[id (DISPID_HTMLINPUTTEXTELEMENTEVENTS_ONSELECT) ] HRESULT onselect ( ) ; 



[ 

uuid(34A7l5A0-6587-HD0-924A-0020AFC7AC4D) , 

helps t r ing ( "Web Browser Control events interface"), 

dual, 

hidden 

1 

interface DWebBrowserEvents2 : IDispatch 

{ 

[id (0x00000066) , helpstring ( "S tatusbar text changed.")] 
HRESULT S tatusText Change ( [in] BSTR Text) ; 

(id (0x0000006c) , helpstring ( "Fired when download progress is updated.")] 
HRESULT ProgressChange ( 

[in] long Progress, 

[in] long ProgressMax) ; 
(id(0x00000069) , helpstring ( "The enabled state of a command changed.")] 
HRESULT CommandStateChange ( 

[in] long Command, ~ 

[in] VARIANT_BOOL Enable) ; 
[id (0x0000006a) , helpstring ( "Download of a page started.")] 
HRESULT DownloadBegin ( ) ; 

(id (0x00000068) , helpstring ( "Download of page complete.")] 
HRESULT DownloadComplete () ; 

(id (0x00000071) , helpstring ( "Document title changed.")] 
HRESULT TitleChange ( [in] BSTR Text)/ 

(id(0x00000070) , helpstring ("Fired when the PutProperty method has been called." 

) J 

HRESULT PropertyChange ( [in] BSTR szProperty) ; 

(id(OxOOOOOOfa) , helpstring (" Fired before navigate occurs in the given WebBrowse 
r (window or frameset element). The processing of this navigation may be modified.")] 

HRESULT BeforeNavigate2 ( 

[in] IDispatch* pDisp, 

[in] VARIANT* URL, 

[in] VARIANT* Flags, 

[in] VARIANT* TargetFrameName, 

[in] VARIANT* PostData, 

[in] VARIANT* Headers, 

[out] VARIANT_BOOL* Cancel) ; 
[id (OxOOOOOOfb) , helpstring ( "A new, hidden, non-navigated WebBrowser window is n 

eeded. " ) ] 

HRESULT NewWindow2( 
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* 

v* 



(ocic] IDispatch** ppDisp, 
[out] VARIANT_BOOL * Cancel) ; 
[id (0x0 0000 Of c) , helpstring ("Fired when the document being navigated to becomes 
visible and enters the navigation stack. •)] 

HRESULT KavigateComplete2 ( 

[in] IDispatch* pDisp, 
(in] VARIANT* URL) ; 

[id(0x00000103) , he Ipstring ( •Fired when the document being navigated to reaches 
ReadyState_Complete . ■) ] 

HRESULT Document Complete { 

[in] IDispatch* pDisp, 
[in] VARIANT* URL) ; 
Cid(0x000000fd) , helpstring( "Fired when application is quiting.")] 
HRESULT OnQuit ( ) ; 

[id(0x000000fe) , helpstring ( "Fired when the window should be shown/hidden " ) ] 
HRESULT OnVisible ( [in] VARIANT_BOOL Visible) ; 

(id(OxOOOOOOff) , helpstring ("Fired when the toolbar should be shown/hidden")] 
HRESULT OnToolBar ( [in] VARIANT_BOOL ToolBar) ; 

Cid(0x00000100) , helpstring ( "Fired when the menubar should be shown/hidden")] 
HRESULT OnMenuBar ( [in] VARIANT_BOOL MenuBar) ; 

[id (0x00000101) , helpstring ( "Fired when the statusbar should be shown/hidden")] 
HRESULT OnStatusBar ( [in] VARIANT_BOOL StatusBar) ; 

(id (0x00000102) , helpstring ( "Fired when fullscreen mode should be on/off")] 
HRESULT OnFullScreen( [in] VAR I ANT_BOQ L Fullscreen); 

(id(0x00000104) , helpstring ( "Fired when theater mode should be on/off")] 
HRESULT OnTheaterMode ( [in] VARIANT__BOOL TheaterMode) ; 

}; 

1/ The validation stuff 

I 

object, 

uuid(6AD8D484-04 90-lld2-801D-00201829472A) , 
dual , 

helpstring ( "IHSFormatter Interface") , 
pointer_def ault (unique) - 

J 

interface IHSFormatter : IDispatch 

{ 

typedef enutn HSFTFormat { 

HSDTDefault = 0, // usually regional settings 

HSDTHealtheon =1 // the Healtheon representations 
} HSFTFormat ; 

/ / The Formatter parses the string to an interna format . 
// This property specifies how this parsing is done 

[propget, id(13) , helpstring ( "property inFomaf)] HRESULT InFormat ( [out , retval] HS 
FTFormat* pVal) ; 

(propput, id(13), helpstring ( "property inFormat")] HRESULT InFormat ( [in] HSFTFormat 

newVal) ; 

// The Formatter outputs the interna format to a string 
// This property specifies how this parsing is done 

[propget, id(14) , helpstring ( "property outFonnat " ) 3 HRESULT OutFormat ( [out , retval] 
HSFTFormat* pVal) ; 

[propput, id(14), helpstring ( "property out Format •) 3 HRESULT OutFormat (( in] HS FT Forma 
t newVal) ; 

// This method takes the input string, parses it to an internal representation (usin 
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g inFormat prop) 

// then outputs to outArg using the out Format prop 

// If the string is invalid the result is undetermined 

(id(2) , helpstring( "method GetConf orming") ] HRESULT Get Conforming { [in] BSTR inArg, [o 
ut, retval] BSTR* outArg) ; 

// An the string be parsed? IsParseable could be a better name 

// If it is invalid it returns false and sets the reason. Otherwise returns true. No 
n conforming 

// strings can be valid e.g.: 

// "408 345-6578 " is a valid us telephone number 

// The inFormat prop is used for determining if it is valid 

[id(D, helpstring( "method IsValid")] HRESULT IsValid( [in] BSTR argString, [out] BSTR* 
reason, [out, retval] VARIANT_BOOL* retVal) ; 

// BUGnol64 61 -- GetConf orminglfValid ( ) removed (no longer required) 

//(id(3), helpstring( "method GetConf orminglfValid" ) ] HRESULT GetConf orminglfValid ([ i 
n] BSTR argString, 

// [out] BSTR* reason, [out] BSTR* strConf ormingValue, (out, retval] VARIANT_BOOL* 

isValid) ; 

+ + + + + + + + „ + + * + * + + + + + * + + + * + 

II Deprecated methods DO NOT USE Removed beyond 2.0 

// Set the inFormat and OutFormat properties instead and use the other methods 

// This method returns a conforming string based on a format 
// that is passed in as an argument 

//(id(4), helpstring("Get a specific format")] HRESULT GetConf ormingWithFormat ( [in] H 
S FT Format fmt, 

// [in] BSTR argString, [out, retval] BSTR* strConf ormingValue) ; 

// This method returns a conforming string based on a format 
// that is passed in as an argument 

//[id(5), helpstringCGet a specific format")] HRESULT GetConf ormingWithFo rmat If Vali 
d ( [ in] HSFTFormat fmt , 

// [in] BSTR argString, [out] BSTR* reason, [out]BSTR* strConf ormingValue, (out, 

retval] VARIANT_BOOL* isValid) ; 

}; 
( 

object, 

UUid(3CA22A51-CAC3-lld2-A19B-00105A214053) , 
dual, 

helps tring ( "IHSFormatter2 Interface implements FT 2.2 enhancements"), 
pointer_def ault (unique) 

] 

interface IHSFormatter2 : IHSFormatter 

{ 

// These two methods are for setting and clearing the list of params 
// for a given formatter. Clients of this interface should clear before 
// appending a list of format parameters. 
(id(15) , helpstring ( "Clear parameter list")] 

HRESULT ClearFormatParamList () ; 
(id(16), helpstring ( "Append a (key/value) pair to list of params")] 

HRESULT AppendFormatParam( [in] BSTR paramKey, [in] BSTR paramVal) ; 

}; 
[ 

object , 

uuid (E7 04 75 34- 04 04 -11D2-801D- 00 2 0182 94 72A) , 
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.4' 

dual , 

helpstring ("IHSValidator Interface") , 
pointer_def ault (unique ) 

1 

interface IHSValidator : IDispatch 

{ 

[propget, bindable, defaultbind, id(0) # helpstring ( "property Formatter object")] HR 
ESULT Formatter ( [ in] BSTR, [out, retval] IHSFormatter **pVal) ; 

}; 



( 

object, 

uuid(5C9B99E7-2D59-HD2-8ElC-00104B79DD7C) , 
dual , 

helpstring ( " IHSComboBox Interface " ) , 
pointer_default (unique) 

1 

interface IHSComboBox : IDispatch 
{ 

[propput, id(DISPID_AUTOSIZE) ] 
HRESULT AutoSize( [in] VARIANT__BOOL vbool); 
[propget, id (DISPID^AUTOSIZE) ] 

HRESULT AutoSize( [out, retval] VARIANT_BOOL* pbool); 

[propput, id (DISPID_ENABL£D) ] 
HRESULT Enabled* [in] VARIANT_BOOL vbool); 

[propget, id (DISPID_ENABLED) ] 

HRESULT Enabled ( [out, retval] VARIANT_BOOL* pbool) ; 

[propput, id(DISPID_TEXT) ] 
HRESULT Text ( [in] BSTR strText) ,- 

[propget, id (DISPIDJTEXT) ] 

HRESULT Text ([out, retval] BSTR* pstrText) ; 
(propput, id(DISPIDJTABSTOP) 3 
HRESULT TabS top ( [in] VARIANT_BOOL vbool) ; 
(propget, id (DISPIDJTABSTOP) ] 

HRESULT TabStop ( [out, retval] VARIANT_BOOL* pbool); 

[propget, id(l)_, helpstring ( "property Style" ) ] HRESULT Style ( [out , retval] short *pV 

al) ; 

[propput, id(l) , helpstring ( "property Style")] HRESULT Style([in] short newVal) ; 
(propget, id(2), helpstring ( "property value" ) ] HRESULT value ( (out , retval] VARIANT * 

pVal) ; 

[propput, id(2), helpstring ( "property value")] HRESULT value([in] VARIANT newVal) ; 
(id(0xfffffdd7) , helpstring ("method Addltem")] HRESULT Addltem( 

[in, optional] VARIANT pvargltem, 

[in, optional] VARIANT pvarglndex) ; 
[propget, id(3), helpstring ( "property maxLength")] HRESULT maxLength ( [out , retval] s 
hort *pVal) ; 

[propput, id(3), helpstring ( "property maxLength")] HRESULT maxLength ( [in] short newV 

al) ; 

// Removed all the elements from the combo box 
(id(4), helpstring ( "method Clear")] HRESULT Clear(); 

}; 

[ 

uuid(17F34EAl-FB59-llDl-801A-00201829472A) , 
version (1.0) , 

helpstring ("Healtheon DHTML Forms Filler Control 1.0 Type Library") 

1 

library HS DHTML 

{ 
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£mportlib("stdole32.tlb") ; 
importlib ( "stdole2 . tlb" ) ; 

enum HSFTDHTKLControlError ; 
enum HSFTFormat; 



// 

//Declare an interface for the object's events 

// disp interface: Event interfaces MOST be dispinterf aces if they are to be used by VB/S 
cript 
// 

// hidden : because there is a CoClass that implements this object as it's default 

event interface. 

// The CoClass makes the object cxeateable. The when viewing the createa 

ble object in the 

// Object Browser displays the default interface 
// 

( 

uuid(B074923E-FB63-lldl-801A-00201829472A) , 

hidden, 

nonextensible 

3 

dispinterf ace IHSDHTMLControlEvents { 
properties: 
methods : 

// 

[id(10) , he lpst ring ("Event triggered when a property changes") J 

BOOL, HTMLElelementBeforeUpdate( [in] BSTR idOfElement, [in] VARIANT Value, [out]BS 

TR* reason) ; 
} 



// 

// 
// 
C 

uuid(17F34ED5-FB59-HDl-801A-00201829472A) , 
helpstring ( "Healtheon DHTML Forms Filler Control") 

1 

coclass Control 

{ 

[default] interface IHSDHTMLControl; 

// 

//Interface of events we want to expose 

// 

[default, source] dispinterf ace IHSDHTMLControlEvents; 
interface DWebBrowserEvents2 ; 
interface HTMLElement Events ; 
interface HTMLInputTextElementEvents ; 

}; 

// This is the validator main object- It contains all the validator objects 
[ 

Uuid(E704 7 53S-0404-llD2-801D-0020182 9472A) , 
he lpst ring ( "Heal theon UI Validator") 

3 

coclass HSValidator 

{ 

[default] interface IHSValidator ; 

}; 
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uuid(443D4590-33B8-lld2-8E23-00104B79DD7C) , 

version (1 . 0) , 

hidden, 

nonextensible 



disp interface DIHSComboBoxEvents { 
properties : 
methods : 

[id(0x00000101) ] void OnClickO ; 

(id(0x00000102) ] void OnDropDownO ; 

[id(0x00000103) ] void OnFocusO; 

tid(0x00000104) } void OnBlurO; 

[id(0x00000105) ] void OnChangeO; 

[id(0x00000106) ] void OnKeyDown ( short pnChar, short nShiftState) 

}; 
[ 

UUid(SC9B99EA-2D59-llD2-8ElC-00104B79DD7C) , 
helpstring("Healtheon HSCotnboBox Control") 

1 

coclass HSComboBox 
( 

[default] interface IHSComboBox; 

[default, source] disp interface DIHSComboBoxEvents; 
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